home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 076-100 / scopedisk85 / scripit / examples < prev    next >
Encoding:
Text File  |  1995-03-19  |  6.6 KB  |  218 lines
  1.                         Example Scripit Scripts
  2.                         -----------------------
  3.  
  4.                           By: Khalid Aldoseri
  5.  
  6.  
  7. -----------------------------------------------------------------------------
  8.                                 Example 1
  9. -----------------------------------------------------------------------------
  10.  
  11. This is a script that shows you how to launch any program
  12. and do a set of actions:
  13.  
  14. runback "full pathname"
  15. waitfor "program's screen name" "program's window name"
  16. menu    MenuName MenuItem [SubItem]
  17. menu    .... etc.
  18.  
  19.  
  20. Example:
  21.  
  22. runback "dh2:Access/Access!"
  23. waitfor "Access"
  24. menu    "Phone" "Re-Dial"
  25.  
  26. Notes:
  27.  
  28.     The quotes are not important unless you have spaces or commas
  29.     in the arguments.
  30.  
  31.     If you need to specify any CLI command switches when running
  32.     the program use:  runback "programname switches...."
  33.  
  34.     With Access, it's best if you wait for all its windows to
  35.     appear on the screen, so you can either add a WAIT statement
  36.     after the WAITFOR, or you can change the WAITFOR to become
  37.     a  (WAITFOR Access #4)  This tell Scripit to wait until four
  38.     windows show up on the Access screen.
  39.  
  40. -----------------------------------------------------------------------------
  41.                                 Example 2
  42. -----------------------------------------------------------------------------
  43.  
  44. This is an expanded example of Example 1:
  45.  
  46. runback "dh2:Access/Access!_Supra"
  47. waitfor Access #5
  48. menu Phone Re-Dial
  49. runback "dh2:Access/ShowModem -sAccess"
  50. waitfor Access "Supra Modem"
  51. window moveto 640 0
  52.  
  53. The following is a full description of it:
  54. (all lines starting with ;; are comments and are ignored by Scripit.)
  55.  
  56. ;; This Scripit script will load Access, tell it to start dialling
  57. ;; then run the Supra ShowModem program and move its window to
  58. ;; the top left corner of the screen.
  59. ;;
  60. ;; By: Khalid Aldoseri.
  61. ;;
  62. ;; Run Access
  63. ;; Replace this with the full path of where your copy of Access is.
  64. runback "dh2:Access/Access!_Supra"
  65. ;; Wait until all of Access's five windows show up.
  66. ;; Note:  If you're not using the chat window change the
  67. ;; #5 to #4.
  68. waitfor Access #5
  69. ;; Tell Access to Re-Dial.  i.e. dial first number in list.
  70. menu Phone Re-Dial
  71. ;; Run the Supra ShowModem program.
  72. ;; Replace this with the full path of where your ShowModem is.
  73. runback "dh2:Access/ShowModem -sAccess"
  74. ;; Wait until ShowModem's window shows up.
  75. waitfor Access "Supra Modem"
  76. ;; Move it to the top right corner of the screen.
  77. window moveto 640 0
  78. ;; Note:  Remove the lines with ;; if you don't want them.
  79.  
  80. -----------------------------------------------------------------------------
  81.                                 Example 3
  82. -----------------------------------------------------------------------------
  83.  
  84. This is a small script that expands the current CLI window, moves the cursor
  85. to the top, and then clears the whole window including its borders. This
  86. gives you a blank CLI with no borders.
  87.  
  88. select active
  89. window moveto 0,0
  90. wait 10
  91. window maxsize
  92. wait 10
  93. con move 0,0
  94. gfx clear 0,0
  95.  
  96.  
  97. Here it is again with comments:
  98.  
  99. ;; Select the active CLI.. normally the one it was started from
  100. select active
  101. ;; Move that window to the top left corner of the screen
  102. window moveto 0,0
  103. ;; Wait a while to make sure the window move operation is done
  104. wait 10
  105. ;; Resize the window to the maximum size possible
  106. window maxsize
  107. ;; Wait a while to make sure the window resize operation is done
  108. wait 10
  109. ;; Move the console cursor to the top
  110. con move 0,0
  111. ;; Clear the window's text/graphics starting from 0,0
  112. gfx clear 0,0
  113.  
  114. -----------------------------------------------------------------------------
  115.                                 Example 4
  116. -----------------------------------------------------------------------------
  117.  
  118. Here's one the runs WordPerfect, resizes its window to fit half the screen,
  119. tells WP to open a new window, resizes that to half as well and moves it to
  120. the bottom of the screen, giving you WP ready for action with 2 windows
  121. ready. (grin)
  122.  
  123. runback "WP:WP"
  124. waitfor Workbench WordPerfect
  125. window resizeto 640,100
  126. wait
  127. menu Project New
  128. waitfor Workbench "WordPerfect 4.1 - Doc 2"
  129. window resizeto 640,100
  130. wait
  131. window moveto 0,100
  132.  
  133.  
  134. Commented Version:
  135.  
  136. ;; Run WordPerfect
  137. runback "WP:WP"
  138. ;; Wait for WP to show up on the Workbench screen
  139. waitfor Workbench WordPerfect
  140. ;; Resize WP's window to 640 by 100
  141. window resizeto 640,100
  142. ;; Wait until resize operation is done.
  143. ;; You might have to increase the wait time if this isn't
  144. ;; enough.  (default wait is 25.. i.e. 1/2 second).
  145. wait
  146. ;; Select the menu 'Project' 'New' to open a new window.
  147. menu Project New
  148. ;; Wait until the second window shows up.
  149. waitfor Workbench "WordPerfect 4.1 - Doc 2"
  150. ;; Resize second window to 640,100
  151. window resizeto 640,100
  152. ;; Wait again.
  153. wait
  154. ;; Move the second window to 0,100.
  155. window moveto 0,100
  156.  
  157. -----------------------------------------------------------------------------
  158.                                 Example 5
  159. -----------------------------------------------------------------------------
  160.  
  161. This is another WP example.  This time, however, it runs WP then loads in
  162. a specific file.
  163.  
  164.  
  165. runback "WP:WP"
  166. waitfor Workbench WordPerfect
  167. menu Project "ยป Retrieve" File
  168. waitfor Workbench Retrieve
  169. ;; Simulate the user typing "RAM:Test". (replace this with your own filename)
  170. key "RAM:Test"
  171. ;; Click on the Accept gadget
  172. gadget Accept
  173.  
  174.  
  175. You can easily merge examples 4 and 5 together and make WP load up any
  176. number of files you like!
  177.  
  178. -----------------------------------------------------------------------------
  179.                                 Example 6
  180. -----------------------------------------------------------------------------
  181.  
  182. Here's a script that'll load Professional Draw, bring up the file requester,
  183. enter the directory and filename and load the file:
  184.  
  185.  
  186. runback "PDraw:PDraw"
  187. waitfor "Professional Draw"
  188. wait
  189. menu Project Open
  190. wait
  191. select window "Open Folio"
  192. gadget Drawer "PDraw:Drawings"
  193. wait
  194. gadget File   "HandFlyer"
  195.  
  196. -----------------------------------------------------------------------------
  197.                                 Example 7
  198. -----------------------------------------------------------------------------
  199.  
  200. Here's another script that'll load Professional Page, and then will create
  201. a new page (ready for work.)
  202.  
  203. runback "PDraw:PDraw"
  204. waitfor "Professional Draw"
  205. wait
  206. menu Page Create
  207. wait
  208. select window "New Page Format"
  209. gadget OK
  210.  
  211. -----------------------------------------------------------------------------
  212. Well, that's it for now.  I hope these are of some help to you.  I'll be
  213. doing another set very soon.  Any questions, comments, bug reports, curses,
  214. etc. are welcome.
  215.  
  216. Khalid Aldoseri    CIS 75166,2531                              9 August 1989.
  217. -----------------------------------------------------------------------------
  218.